home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / vb / gridcal.exe / CALFORM.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1992-01-19  |  5.7 KB  |  166 lines
  1. calform
  2. Calendar
  3. Form1*
  4. MonthArray
  5. &January
  6. MonthArray
  7. Jul&y
  8. @    GridMonth
  9. YearEntered
  10. MonthArray
  11.     &February
  12. MonthArray
  13. Augus&t
  14. Grid1
  15. MonthArray
  16. &March
  17. MonthArray
  18. &September
  19. MonthArray
  20. &April
  21. MonthArray
  22. &October
  23. MonthArray
  24. MonthArray
  25.     &November
  26. MonthArray
  27. Jun&e
  28. MonthArray
  29.     &December
  30. About
  31. A&bout
  32. Text1_Changev
  33. Command1_Click
  34. index
  35. Label1_Click?
  36. Form_Click
  37. @    Form_Load
  38. Label1H
  39.     alignment
  40. lable1
  41. caption"
  42. fontsize
  43. TestAmount
  44. YearEnteredu
  45. Text,
  46. Timer1_TimerO
  47. Timer1^
  48. enabled
  49. Falsef
  50. YearEntered_Change,
  51. YearEntered_KeyPress
  52. keyascii@
  53. currentmonth1
  54. monthlabel
  55. selectSelect
  56. garbage
  57. Relval
  58.     Daynumber
  59. numbdays 
  60. LoadDays
  61. GobSub
  62. TheYear
  63. Frame1_DragDropp
  64. Source
  65. Frame1
  66. Left0
  67. ScaleWidth
  68. Width
  69. CalForle
  70. CalForm
  71. Command2_Click
  72. Meadows
  73. AndrewsS
  74. Davis
  75. Firm-
  76. Main    
  77. Oklahoma@
  78. yearselected
  79. Curdate
  80. Relvw
  81. tempbg'
  82.     backcolor3
  83.     forecolor
  84. tempfg
  85. Grid1
  86. selstartrow
  87. selstartcol{
  88.     selendrow
  89.     selendcol
  90. dispstr
  91. colwidthV
  92.     GridMonth
  93.     rowheight
  94. Ddate
  95. monthindex
  96.     lostFocusD
  97. Grid1_LostFocusT
  98. Grid1_Click
  99. Grid1_DoubleClick
  100. Grid1_DblClick
  101. selrow
  102. selcol
  103. seltartrow
  104. TopRow
  105. LeftCol
  106. ScaleHeight
  107. ScaleWidtht'
  108. Heightu
  109. Conmst
  110. MonthArray_Click    
  111. selectedmonth<
  112. selectmonth9
  113. About_Click
  114. originalz
  115. MichaelL
  116. Graves
  117. basedk
  118. design
  119. Andrew/
  120. message
  121. appears
  122. below
  123. CompuServeF
  124. health
  125. reachedV
  126.     SerialVal
  127. display
  128.     adjusting
  129.     necessary
  130. Screen
  131. YearEntered_
  132. YearEntered_SetFocus
  133. tabindex
  134. GotFocus
  135. YearEntered_GotFocus.
  136. Form_Load
  137. Center form on screenc
  138. Display days of the week titles (Sun, Mon etc)
  139. initialize year to display and Month to display to the current month and year 
  140. YearEntered_KeyPress
  141. If new year selected then re-display calendar 
  142. LoadDays
  143. Clear all grid text fields and adjust width of colsD
  144. Get the day of the week for the current date$f
  145. Display calendar days starting from first day of the month for selected month 
  146. If the day to be printed is todays date then hi-lite the day
  147. Increment through rows and cols to display days of the weeks
  148. MonthArray_Click
  149. Day Out Of Range: 
  150. Get Serialized date value for selected month
  151. Initialize number of days based on month
  152. (adjusting for leap year if necessary)
  153. and display days on grid using LoadDays subt
  154. Please Select Month"
  155. About_Click
  156.  This code had major surgery on January 19, 1992 to use the GRID.VBX custom control 
  157.  (found on Compuserve in MSBASIC, LIB5 as GRID2.ZIP). It is based on an 
  158.  original design by Andrew Davis (CALZIP.ZIP in same LIB  - his original
  159.  message appears below). I can be reached on CompuServe [72240,1123], 
  160.  use in good health! "
  161.                                                          Michael Love Graves "
  162.  'Use this as you see fit.  The code is yours. If it saves you an hour of coding, 
  163.  then send me the value of 1/4 hour of your time. Send contributions to"
  164.  Al Meadows  c/o Andrews Davis Law Firm, 500 West Main, Oklahoma City, Ok. 73102'"
  165. About Calendar
  166.